10 PRINT"[147]"
20 REM COVER SHEET
30 PRINT"PRESS 'P' TO PRINT COVER SHEET"
35 PRINT"PRESS 'E' TO END"
40 GETA$:IFA$><"P"ANDA$<>"E"THEN40
50 IFA$="E"THENEND
60 OPEN1,4
70 CMD1
75 PRINTCHR$(15)
80 FORT=1TO20:PRINT"":NEXT
90 FORU=1TO40:PRINT"[214][214]";:NEXT
100 FORV=1TO10:PRINT"":NEXT
110 PRINTCHR$(14)CHR$(16)"25ROGER & SUSAN'S"
120 PRINTCHR$(16)"32COOKBOOK"
130 PRINTCHR$(15)
140 FORQ=1TO10:PRINT"":NEXT:FORIU=1TO40:PRINT"[214][214]";:NEXT
150 FORT=1TO22:PRINT#1:NEXT:CLOSE1